home *** CD-ROM | disk | FTP | other *** search
/ Ahoy 1988 November / Ahoy_Magazine_88-11_1988_Double_L.d64 / FAST Mode (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  376b  |  11 lines

  1. 10 rem fast mode by steve cody
  2. 20 fast=828:slow=fast+14
  3. 30 for x=fast to fast+13:reada:pokex,a:ck=ck+a:next
  4. 40 ifck<>1707thenprint"data error!!":stop
  5. 50 data 173,17,208,41,239,141,17,208,169,1,141,48,208,96
  6. 60 forx=slow to slow+13:reada:pokex,a:ck=ck+a:next
  7. 70 ifck<>3158thenprint"data error!!":stop
  8. 80 data 169,0,141,48,208,173,17,208,9,16,141,17,208,96
  9. 90 print"sys"fast"for fast mode"
  10. 100 print"sys" slow"for slow mode":end
  11.